Public Class ELocalidad
#Region "declaracion de propiedades"

    Private midLocalidad As Int32
    Public Property idLocalidad() As Int32
        Get
            Return midLocalidad
        End Get
        Set(ByVal value As Int32)
            midLocalidad = value
        End Set
    End Property

    Private mlocalidad As String
    Public Property localidad() As String
        Get
            Return mlocalidad
        End Get
        Set(ByVal value As String)
            mlocalidad = value
        End Set
    End Property

    Private mestado As Int32
    Public Property estado() As Int32
        Get
            Return mestado
        End Get
        Set(ByVal value As Int32)
            mestado = value
        End Set
    End Property

#End Region

#Region "inicializacion"

    Public Sub New()
        reset()
    End Sub

#End Region

#Region "metodos publicos"

    'inicializa la entidad a los valeres por defecto
    Public Sub reset()
        midLocalidad = 0
        mlocalidad = ""
        mestado = 0

    End Sub

#End Region
End Class
